home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d12
/
v8n22.arc
/
SRCHDEL.MAC
< prev
next >
Wrap
Text File
|
1989-11-28
|
378b
|
2 lines
«SET delsty = ?Style to be deleted.»«SET prompt = ?Confirm deletions Y/N»«IF prompt = "n"»«SET prompt = "N"»«endif»«IF prompt = "y"»«SET prompt = "Y"»«endif»<Ctrl PgUp><Ctrl Esc>fes«delsty»<Tab>d<Enter>«WHILE FOUND»«IF prompt = "Y"»«SET delet = ?Delete Y/N»«IF delet="y"»«SET delet="Y"»«endif»«IF delet="Y"»<del>«ELSE»<Right>«ENDIF»«ELSE»<Del>«ENDIF»<Left><Shift F4>«ENDWHILE»